home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr47 / altbc553.zip / ALTQUICK.DEF < prev    next >
Text File  |  1993-05-08  |  12KB  |  250 lines
  1. ' ALTQUICK.DEF  this is a set of prototype declarations for the procedures
  2. '               which are included in the ASSEMBLY-LANGUAGE TOOLBOX. Include
  3. '               only the routines which you intend to use in your code.
  4. '
  5. '   Author:     Christy Gemmell
  6. '   For:        Assembly-Language Toolbox for QuickBASIC
  7. '   Version:    5.52
  8. '   Date:       9/3/1993
  9. '
  10. '   Compatible with Microsoft BASIC 7.1 and VisualBASIC for DOS
  11. '
  12. '   The following prototypes refer to external procedures which are in
  13. '   the library files TOOLBOX.LIB and TOOLBOX.QLB. One or other of these
  14. '   libraries must be linked to the program which calls them.
  15. '
  16.     DECLARE FUNCTION Attrib% (FileSpec$)
  17.     DECLARE FUNCTION Attribute% (BYVAL Fore%, BYVAL Back%)
  18.     DECLARE FUNCTION BitTest% (Number%, Bit%)
  19.     DECLARE FUNCTION CapsLock% (BYVAL Switch%)
  20.     DECLARE FUNCTION Cpu% ()
  21.     DECLARE FUNCTION DayNumber& (BYVAL Day%, BYVAL Month%, BYVAL Year%)
  22.     DECLARE FUNCTION DiskReady% (BYVAL Drive%)
  23.     DECLARE FUNCTION DisplayMode% ()
  24.     DECLARE FUNCTION DisplayPage% ()
  25.     DECLARE FUNCTION EmsError% ()
  26.     DECLARE FUNCTION EmsFrame% ()
  27.     DECLARE FUNCTION EmsOwned% (BYVAL Handle%)
  28.     DECLARE FUNCTION EmsPages% (BYVAL Switch%)
  29.     DECLARE FUNCTION EmsPresent% ()
  30.     DECLARE FUNCTION EmsVersion% ()
  31.     DECLARE FUNCTION FarPeek% (BYVAL Segment&, BYVAL Offset&)
  32.     DECLARE FUNCTION FileSize& (FileSpec$)
  33.     DECLARE FUNCTION FloppyDrives% ()
  34.     DECLARE FUNCTION FreeSpace& (BYVAL DriveNo%)
  35.     DECLARE FUNCTION GamesPort% ()
  36.     DECLARE FUNCTION Handles% ()
  37.  
  38. '   ******* Note new function HIBYTE *****************************************
  39. '
  40.     DECLARE FUNCTION HiByte% (BYVAL Number%)
  41.  
  42. '   ******* Note new function HIWORD *****************************************
  43. '
  44.     DECLARE FUNCTION HiWord% (BYVAL Number&)
  45.     DECLARE FUNCTION Interval& (First&, Second&)
  46.     DECLARE FUNCTION KeyFlags% ()
  47.     DECLARE FUNCTION KeyIn% ()
  48.     DECLARE FUNCTION KeyStat% ()
  49.  
  50. '   ******* Note new function LASTWORD *************************************
  51. '
  52.     DECLARE FUNCTION LastWord$ (Last$)
  53.  
  54. '   ******* Note new function LOBYTE ***************************************
  55. '
  56.     DECLARE FUNCTION LoByte% (BYVAL Number%)
  57.  
  58. '   ******* Note new function LONGEST **************************************
  59. '
  60.     DECLARE FUNCTION Longest$ (Original$)
  61.  
  62. '   ******* Note new function LOWORD ***************************************
  63. '
  64.     DECLARE FUNCTION LoWord% (BYVAL Number&)
  65.     DECLARE FUNCTION MastrEnv% ()
  66.     DECLARE FUNCTION MathsChip% ()
  67.     DECLARE FUNCTION MouseInit% ()
  68.     DECLARE FUNCTION NetTest% ()
  69.     DECLARE FUNCTION NextWord$ (Last$)
  70.     DECLARE FUNCTION NumberDay% (Number&, Day%, Month%, Year%)
  71.     DECLARE FUNCTION NumLock% (BYVAL Switch%)
  72.     DECLARE FUNCTION ParallelPorts% ()
  73.     DECLARE FUNCTION PeekWord& (BYVAL Segment&, BYVAL Offset&)
  74.     DECLARE FUNCTION PrinterStat% (BYVAL Printer%)
  75.     DECLARE FUNCTION PrinTest% (BYVAL Printer%)
  76.  
  77. '   ******* Note new function PROGNAME$ **************************************
  78. '
  79.     DECLARE FUNCTION ProgName$ ()
  80.     DECLARE FUNCTION RamDisk% ()
  81.     DECLARE FUNCTION Rand% (BYVAL Lower%, BYVAL Higher%)
  82.     DECLARE FUNCTION ScreenRows% ()
  83.     DECLARE FUNCTION ScreenWidth% ()
  84.     DECLARE FUNCTION ScrLock% (BYVAL Switch%)
  85.     DECLARE FUNCTION SerialPorts% ()
  86.     DECLARE FUNCTION Sharing% ()
  87.     DECLARE FUNCTION Soundex& (Text$)
  88.     DECLARE FUNCTION Spooler% ()
  89.     DECLARE FUNCTION SpoolSuspend% ()
  90.     DECLARE FUNCTION StatusLine% (Message$)
  91.     DECLARE FUNCTION StringScan% (Trgt$, BYVAL Size%, BYVAL Strt%, BYVAL Addr%)
  92.  
  93. '   ******* Note new function TEMPFILE$ **************************************
  94. '
  95.     DECLARE FUNCTION TempFile$ (BYVAL FlAttr%)
  96.     DECLARE FUNCTION TextVal& (Text$)
  97.     DECLARE FUNCTION Verify% (BYVAL Default%, BYVAL Row%, Prompt$,_
  98.                               BYVAL Attr%, BYVAL Mouse%)
  99.     DECLARE FUNCTION WeekDay% (BYVAL Day%, BYVAL Month%, BYVAL Year%)
  100.  
  101.     DECLARE SUB BackFill (BYVAL Row%, BYVAL Col%, BYVAL Rows%, BYVAL Cols%,_
  102.                           BYVAL Attr%)
  103.     DECLARE SUB BitReSet (Number%, Bit%)
  104.     DECLARE SUB BitSet (Number%, Bit%)
  105.     DECLARE SUB BitShl (Number&, Count%)
  106.     DECLARE SUB BitShr (Number&, Count%)
  107.     DECLARE SUB Blinking (BYVAL Switch%)
  108.     DECLARE SUB CgaCopy (BYVAL Switch%, Buffer$)
  109.     DECLARE SUB CgaScroll (BYVAL xLoc%, BYVAL yLoc%, BYVAL xPixels%,_
  110.                            BYVAL yPixels%, BYVAL Direction%)                 
  111.     DECLARE SUB CgaText (BYVAL xLoc%, BYVAL yLoc%, Text$,_
  112.                          BYVAL Attr%, BYVAL Scale%)
  113.     DECLARE SUB Cipher (Text$, KeyWord$)
  114.     DECLARE SUB ClearEnd (BYVAL Switch%, BYVAL Attr%)
  115.     DECLARE SUB Curtains (BYVAL Speed%, BYVAL Attr%)
  116.     DECLARE SUB Delay (BYVAL MilliSeconds%)
  117.     DECLARE SUB DisablePrtSc ()
  118.  
  119. '   ******* Note new procedure DOSBOX ****************************************
  120. '
  121.     DECLARE SUB DOSBox (BYVAL Switch%, BYVAL Y1%, BYVAL X1%, BYVAL Y2%,_
  122.                         BYVAL X2%, BYVAL Attr%)
  123.     DECLARE SUB DwPrint (BYVAL Printer%, Buffer$, BYVAL NewLine%)
  124.     DECLARE SUB EmPrint (BYVAL Printer%, Buffer$, BYVAL NewLine%)
  125.     DECLARE SUB EmsGet (BYVAL Segment%, BYVAL Offset%, BYVAL Length%,_
  126.                         BYVAL Page%, BYVAL Handle%, Done%)
  127.     DECLARE SUB EmsMap (BYVAL Handle%, Physical%, Logical%)
  128.     DECLARE SUB EmsPut (BYVAL Segment%, BYVAL Offset%, BYVAL Length%,_
  129.                         BYVAL Page%, BYVAL Handle%, Done%)
  130.     DECLARE SUB EmsRelease (BYVAL Handle%)
  131.     DECLARE SUB EmsRequest (BYVAL Pages%, Handle%)
  132.     DECLARE SUB EmsReSize (BYVAL Handle%, Pages%)
  133.     DECLARE SUB EnablePrtSc ()
  134.     DECLARE SUB EnPrint (BYVAL Printer%, Buffer$, BYVAL NewLine%)
  135.     DECLARE SUB Explode (BYVAL Y1%, BYVAL X1%, BYVAL Y2%, BYVAL X2%,_
  136.                          BYVAL Attr%, BYVAL Speed%)
  137.     DECLARE SUB FarPoke (BYVAL Segment&, BYVAL Offset&, BYVAL Byte%)
  138.     DECLARE SUB FastPrint (BYVAL Row%, BYVAL Col%, Text$, BYVAL Attr%)
  139.     DECLARE SUB FileDate (BYVAL Switch%, DateTime$, FileSpec$)
  140.     DECLARE SUB GraPrint (BYVAL xLoc%, BYVAL yLoc%, Text$,_
  141.                           BYVAL Attr%, BYVAL Scale%)
  142.     DECLARE SUB HelpMate (BYVAL Colour%, Title$, BYVAL Context%, Topic$)
  143.     DECLARE SUB Hide (BYVAL Switch%, FileSpec$)
  144.     DECLARE SUB Inform (BYVAL Row%, Message$, BYVAL Attr%, BYVAL Mouse%)
  145.     DECLARE SUB Int2E (DosCmd$)
  146.     DECLARE SUB ItPrint (BYVAL Printer%, Buffer$, BYVAL NewLine%)
  147.     DECLARE SUB KeyFlush ()
  148.     DECLARE SUB LptSwap (BYVAL Printer1%, BYVAL Printer2%)
  149.     DECLARE SUB McgaCopy (BYVAL Switch%, SEG Array())
  150.     DECLARE SUB McgaScroll (BYVAL xLoc%, BYVAL yLoc%, BYVAL xPixels%,_
  151.                             BYVAL yPixels%, BYVAL Direction%)                 
  152.     DECLARE SUB MCgaText (BYVAL xLoc%, BYVAL yLoc%, Text$,_
  153.                           BYVAL Attr%, BYVAL Scale%)
  154.     DECLARE SUB MisTake (BYVAL Row%, Message$, BYVAL Attr%, BYVAL Mouse%)
  155.     DECLARE SUB MouseBorder (BYVAL x1%, BYVAL y1%, BYVAL x2%, BYVAL y2%)
  156.     DECLARE SUB MouseHide ()
  157.     DECLARE SUB MouseMickey (horizontal%, vertical%)
  158.     DECLARE SUB MouseNow (leftButton%, rightButton%, xMouse%, yMouse%)
  159.     DECLARE SUB MousePressLeft (leftCount%, xMouse%, yMouse%)
  160.     DECLARE SUB MousePressRight (rightCount%, xMouse%, yMouse%)
  161.     DECLARE SUB MousePut (BYVAL xMouse%, BYVAL yMouse%)
  162.     DECLARE SUB MouseRelLeft (leftCount%, xMouse%, yMouse%)
  163.     DECLARE SUB MouseRelRight (rightCount%, xMouse%, yMouse%)
  164.     DECLARE SUB MouseRestore ()
  165.     DECLARE SUB MouseSave ()
  166.     DECLARE SUB MouseShow ()
  167.     DECLARE SUB MouseSpeed (BYVAL horizontal%, BYVAL vertical%)
  168.     DECLARE SUB MouseWarp (BYVAL threshold%)
  169.     DECLARE SUB ParkHeads ()
  170.     DECLARE SUB Pause (BYVAL Ticks%)
  171.     DECLARE SUB PerCentBox (BYVAL Switch%, Message$, BYVAL Attr%,_
  172.                             BYVAL PerCent%)
  173.     DECLARE SUB PokeWord (BYVAL Segment&, BYVAL Offset&, BYVAL Word&)
  174.     DECLARE SUB PopUp (BYVAL Row%, BYVAL Col%, BYVAL Hght%, BYVAL Wdth%,_
  175.                        BYVAL Attr%, BYVAL Brdr%, BYVAL Shdw%, BYVAL Zoom%)
  176.     DECLARE SUB PrintSet (BYVAL Row%, BYVAL Col%, BYVAL Attr%,_
  177.                           BYVAL Printer%, BYVAL Mouse%)
  178.  
  179. '   ******* Note new procedure PRN2FILE **************************************
  180. '
  181.     DECLARE SUB Prn2File (BYVAL Switch%, FileSpec$)
  182.  
  183. '   ******* Note new procedure REDIRECT **************************************
  184. '
  185.     DECLARE SUB ReDirect (BYVAL Switch%, FileSpec$)
  186.     DECLARE SUB ReSeed (BYVAL Seed&)
  187.     DECLARE SUB ScreenDump ()
  188.     DECLARE SUB Scroll (BYVAL Dir%, BYVAL Y1%, BYVAL X1%, BYVAL Y2%,_
  189.                         BYVAL X2%, BYVAL Units%, BYVAL Attr%)
  190.     DECLARE SUB Secure (BYVAL Switch%, FileSpec$)
  191.     DECLARE SUB Share (BYVAL Switch%, FileSpec$)
  192.     DECLARE SUB ShutUp (BYVAL Speed%)
  193.     DECLARE SUB SpoolDelete (FileSpec$)
  194.     DECLARE SUB SpoolFlush ()
  195.     DECLARE SUB SpoolList (Buffer$)
  196.     DECLARE SUB SpoolReStart ()
  197.     DECLARE SUB SpoolSubmit (FileSpec$)
  198.     DECLARE SUB StringSort (BYVAL Dir%, BYVAL Size%, BYVAL Addr%)
  199.  
  200. '   ******* Note new procedure STUFFBUFFER ***********************************
  201. '
  202.     DECLARE SUB StuffBuffer (Buffer$)
  203.     DECLARE SUB UlPrint (BYVAL Printer%, Buffer$, BYVAL NewLine%)
  204.     DECLARE SUB VGADim (BYVAL Intensity%)
  205.     DECLARE SUB VGALoad (FileSpec$)
  206.     DECLARE SUB VGAPan (BYVAL X%, BYVAL Y%)
  207.     DECLARE SUB VGASave (FileSpec$)
  208.     DECLARE SUB VgaText (BYVAL xLoc%, BYVAL yLoc%, Text$,_
  209.                          BYVAL Attr%, BYVAL Scale%)
  210.  
  211.     DECLARE FUNCTION BinDec& (Binary$)
  212.     DECLARE FUNCTION CapItal$ (Original$)
  213.     DECLARE FUNCTION Centre$ (Text$, MaxWidth%)
  214.     DECLARE FUNCTION DateInput$ (Default$, Context%, Topic$, HotKey%)
  215.     DECLARE FUNCTION DaysBetween& (Date1$, Date2$)
  216.     DECLARE FUNCTION DecBin$ (Decimal&)
  217.     DECLARE FUNCTION DosVersion$ ()
  218.     DECLARE FUNCTION FindFile$ (FileSpec$, Attr%, Mouse%)
  219.     DECLARE FUNCTION GetFlag% (Flag%)
  220.     DECLARE FUNCTION GrAttrib% (ForeGround%, BackGround%)
  221.     DECLARE FUNCTION IsDir% (Test$)
  222.     DECLARE FUNCTION LegalName% (FileSpec$)
  223.     DECLARE FUNCTION LineUp$ (Num#, Places%, Comma%, Length%, Currency$)
  224.     DECLARE FUNCTION LongDate$(Day%, Month%, Year%)
  225.     DECLARE FUNCTION Match% (Start%, Search$, Pattern$)
  226.     DECLARE FUNCTION RevInput$ (Max%, Visible%, Default$, Legal$, Ctx%,_
  227.                                 Topic$, Mask%, HotKey%)
  228.     DECLARE FUNCTION RootName$ (Path$, Extension%)
  229.     DECLARE FUNCTION Round$ (Number#, Places%)
  230.     DECLARE FUNCTION Salute$ (Original$)
  231.     DECLARE FUNCTION ScreenMode% ()
  232.     DECLARE FUNCTION StripQuote$ (Source$)
  233.     DECLARE FUNCTION UnPad$ (Text$, Length%)
  234.     DECLARE SUB BarMenu (P1%, P2%, P3%, Menu$(), P5%, P6%,_
  235.                          P7%, P8$, Mouse%, HotKeys%)
  236.     DECLARE SUB CheckPrinter (Printer%, Ready%)
  237.     DECLARE SUB Media (Set%, Drive$, Volume$, Serial$, FileSy$)
  238.     DECLARE SUB Panel (Row%, Col%, Rows%, Cols%, Border%, Attr%)
  239.     DECLARE SUB PickList (Selected%, Title$, Array() AS STRING, Attr%, Mouse%)
  240.     DECLARE SUB SetFlag (Flag%, Setting%)
  241.     DECLARE SUB SortFile (PathName$, OffSet%, FieldLen%, RecordLen%, Done%)
  242.     DECLARE SUB SplitName (Source$, Title$, Initial$, SurName$)
  243.     DECLARE SUB VerMenu (P1%, P2%, P3%, P4%, P5%, P6$, Menu$(),_
  244.                          P8%, P9%, P10%, P11%, P12$, Mouse%, HotKeys%)
  245.     DECLARE SUB VideoMode (Colour%, MaxRes%, VideoRam%)
  246.  
  247. ' ┌────────────────────────────────────────────────────────────────────────┐
  248. ' │     (c) 1988,1993 By Christy Gemmell and Singular SoftWare             │
  249. ' └────────────────────────────────────────────────────────────────────────┘
  250.